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ERPITORI AL 


This issue was particular tough to produce for some reason - possibly 
I had to type more of the items in than usual, Anyway, I hope that 
there will be a lot of reading in it for ALL members - you don’t have 
to be a crogramming genius to make a very worthwhile contribution to 
Beeblet. I would like to see a lot more news about what people are 
deing, what problems they are having, what they have achieved. It 
would be nice to hear from a few more Electron owners too. 
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Anyone feel like organising a national convention? Need not be in one 
of the main centres, should be at a reasonably inexpensive location 
with provision for families. Any suggestions, starting with suitable 
sites, and timing? 
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The COMPETITION to produce educational software for young children 
continues - see the September issue for further details. 


JE EE 
DISK ORDER 


Jill Armstrong of the Wellington branch is Keeping in close touch with 
the local agent re the bulk order. Evidently they have had someone in 
the States sorting out the problems - we are mot the only ones 
affected. I expect that we will get some action before the next 
Beeblet (I am getting close to running out of disc space...). 
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I notice that ancther micro group is suggesting that different areas 
might investigate the prospect of billeting people from other areas on 
visits, We could' certainly do with a bit more = inter-branch 
communication. 
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Don’t forget ta check the ads im this issue: local retailers now carry 
a very good ‘range. Some of.them are wondering where all the BBC 
people have gone. 
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em LETTER TO THE EDITOR 
Anne. 


In recent UK computer magazines, the questions "where are the women" 
and “how can they be encouraged inte computer use?" have been 
discussed. I would suggest that they are staying out of another field 
where women are depicted as being capable of only “amusing” men. 


Cartoons and drawings stand out from text, and the one on page 31 of 
the September Beeblet was noticed, and unfavourably commented on_ by 
several women on a computer course I am involved in. As former Editor 
of this magazine, I did not put all my (female) efforts into producing 


it; only to have such drawings published in it as will alienate a 
section of its readership. 


Furthermore, that particular drawing is unoriginal - I] have seen the 
identical scenario hand drawn with different initials, and have also 
seen drawings in very similar vein in an American magazine. 


P.S, How about getting some of the readership te design an interface 
for that marvellous "3D" printer on page 7? I’m sure it would out-do 
the "Beastie" currently available for the Beeb. 


Editer’s Comment: 


Great! Someone has finally got around to telling me what they 
do/don’t want to see in Beeblet. Those who feel alienated from the 
magazine’s content have two options: 

- do nothing 

~ tell me about it 


Only one of these options is likely to result in any improvement. 


The cartoon is in fact as original as any published cartoon is likely 
to be ~ it was sketched by Ricardo Delee some time ago and then 
computerised for publication in Beeblet by Tim Ryan. It is werth 
thinking about that cantoon - just what is it commenting on? 


Anne made the point that graphics stand out from text. This is why I 
was interested in the cartoon: it broke up a great sea of text. Ht 
was also intended to suggest that contributions to Beeblet don’t need 
to be highly sophisticated programs (which I suspect alienate some of 
the group). 


a ee EE Gey es SE ee i ee: ees ep ee ET OG EE, cei Ge ee ee ee ee ee 


dee ES A A PS GG A A el el i ES A SS A A ce! Shik 


ea CHReLLENGE ! 


Some of you will be familiar with the puzzles published in the 
English magazine New Scientist. A member of a Wellington micro club 
has obtained permission from New Scientist to use these, and | thought 
they might appeal to a few members of our group. 


First, a warm up - ENIGMA is exactly divisable by EE NN 11 GG MM AA BB 
and CC. Each individual letter represents a different digit. 


Which number does ENIGMA represent? 
NB. There 1s ONE correct solution. 


Your editer solved this one fairly quickly without computer 
assistance, using pure logic to reduce the possibilities down to about 
a dozen mumbers. I then discovered a major flaw in my chain of 
Deductions... 


Now something more difficult: 
The matrix below represents 2a full set of 2& dominos {from 6@ to 66) 


arranged in a &x7? block. The position of the 63 domino is marked, 
Where are the boundaries between the other dominos? | 


A ~) 
i 


os PI r= OY em Go 
om By 63 C3 PD PD 
G2 & On & Of oe 
hI 6 bo oy OF 


ce 


Again, there is ONE correct solution. 

Solutions should be accompanied by a detailed explanation and listing; 
if appropriate. The only reward offered is the intellectual 
Satisfaction, ano additional. experience, derived from the exercise 
however the same problem is likely to be posed to the local Apple 
Users Group. People might like to note run times.... 
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CENFRONICS parallel, 


NB. SCHOOLS 
purchases. 


ELBUG 

ELECTRON USER 
EDUCATIONAL COMPUTING 
MICRE USER 


19 + $2-590 pp. 


BRC SOFTWARE 


JOHM GILBERT ELECTRONICS 
Parnell Rise, P.O, Box 37-245, AUCKLAND. Telephone (09) 30-839 


Annual Sub, 





$4-95 + $8-58 $38-88 
94-995 + $6-56 $58-06 
$4-99 + $9-06 $58-98 
$4.99 + $6.56 $38-89 
$5-58 + $8-75 $66-89 


isgk SOLIDISK Sideways RAM 









$219 + sales tax 


DATALIFE diskettes (5.25",SSDD,40T but useable SOT, : 


SPECI fL :-— PACESETTER 19" dot matrix PRINTERS. 
tractor / friction feed, 98 cps, 
Bidirectional, Superscript, Bit image graphics. 

LIMITED QUANTITY : $750-@0 + $5-0@ freight. 
Special tax free prices for school 











$29-56: 
~Strategy { ~Strateay 2 -Detective 
-Froglet “Demon Knight -Stockmarket 
~Fall of Rome -White Burrows 
-Snooker 
-Cosmic Cruiser 
-Mr Wimpy 
~Invader -Sentinal “Light Cycle 
$39-58: 
~Planetfali -The Valley 
“Nifty Lifty -Digger 
$27-00: 
“Hunchback ~2602 -Crazy Painter 


~Road Runner 


“Frogger 
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me LETTER 
John 6B, Waiheke Island 


From one oldie tc all you other oldies out there, get a computer, they 
are fun' If you feel that there is such a thing as a generation gap 
then reduce the gap by taking up computing. My young grandson aged 1@ 
years tells his contempories (with some pride), "my grandad is into 
computing." 


Yes, I bought a computer; an Electron. I did not Know a thing about 
computing. I’m now learning the BASIC language from a book entitled 
‘3@ Hour BASIC’ by Clive Prigmore (recommended). You can take the 30 
hour bit with a pinch of salt! 


I got a great high on seeing my first program run, a little program of 


4 lines: 
i@ REM DEGF TO DEGC. 
2@ PRINT "DEG F"; TABELS)"DEG C" 
3@ FOR A={ TO 212 
48 PRINT;SA ;TABCIS)IS/9)#(A-32) 
38 NEXT A 


Ah; great stuff. I then had the bit between my teeth (dentures), what 
would happen if in line 3@ I added an STEP 0.01 ? Well, well, the 
numbers scrolled across the screen for what seemed like hours. 


Alhough the Electron runs at 2 MHZ, it made me realize how slow 2 MHZ 
is if one wishes to do some "real" computing. 


You Grandads, da not be intimidated by all the computer jargon. I! 
remember picking up my first magazine and on turning the pages 
thinking "my God, what does ali this jargon mean." Well, I can tell 
you that the jargon has meaning, it makes sense, bit by bit (byte by 
byte) it falls into place. My own personal portable computer which is 
protected by my thick skull is now over 7@ years old, but is still 
running well, albeit now a little short of R.O.M. and R.A.M. 


All you people who live on your own think about getting a computer. 
You don’t HAVE.to write. programs - there are many games to play and 
many other programs to run. I play chess with my computer. 


Geod luck to you aij, 
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A LETTER FROM BEEBUG 


The Editor of Beebug, Mike Williams, has sent a note including the 
following: 


"T always read with interest the copies of Beeblet that we receive 
here in the BE@BUG office. In the July issue you printed a survey of 
Magazines available for the BBC micro which included, I was pleased ta 
see, BEE BUG. Unfortunately the address given is no longer correct, as 
a quick look at any issue over the last 12 months will quickly show. 


We would appreciate it if you could print a correction, the correct 
address being: 


BEEBUG, 

P,O, Box 189, 
High Wrcambe, 
Bucks HPi@ SHO 


iene rate will also be $25 per annum from ist October, 
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Want some free software? 


I currently have available a dozen or so pieces of software for BEC 
"BY (provided by distributors for review purposes). Anyone who want’s 
to get hold of something for nothing, please write to Steve Williams, 
61 Disraeli Street, Epsom. All you have to do is promise to write a 
review for Beeblet; and you get to Keep the tape! 
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Allister J. writes, "as the author, I refer you to two errors in the 
August PROC/FN library in Beeblet. The function should read as 
foliows: 


1@ DEFFNformattlen,vat) 
26 =RIGHTS(STRINGS( ten, "6" +STRE(vald lend 


Also, by changing the "@" to " " you have the right justification 
without the extra zeroes, This often looks better." 
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EXPAND WITH JUNK 
Tony W. Napier 


Got a Beeb; have you? Managed to srap up the necessary for the micro 
plus a cassette player and use the family TV as a VDU? Its great 
isn’t it; but now you’ve had it for a few months you want to spead 
your wings. Alas; no more cash, not even for one little Alien Zapping 
game. Does despondency set in as the Kids give Mum a cup of tea in 
bed on Fathers Day, instead of aiving you the latest Micro User you 
can’t afford yourself? (or vice versa if you are a Mum). Cheer up; 
read on, and learn what can be done. 


I had a Beeb with @.1 OS - couldn’t spare the cash even for an upgrade 
to 1.2 OS - and was beseiged By bugs ( VDU23;8202;0;0;0; and 1% was 
tysed in correctly, Anton and Tim R.) which other people couldn't help 
me with because they all had 1.2 OS. However; thanks to the 
generosity of Paul H. of the Hawkes Bay User Group, wha had a spare 
one, I now have 1.2 OS and the feeling of "I’ve got one too”. This 
set me wondering how other goodies could be obtained. No cash’ How 
to get cash? I had a good think and wondered what was surplus. 
Definitely not my wife and Kids, but what about that old leather 
briefcase, real leather, but unused for about 22 years, and an even 
Clder leather suit case; and those wooden carpenters planes, older 
than I am, must be antique. And a couple of brass spring balances - 
Saw those in an antique shop window once ~- and that pair of stereo 
headphones we don’t use now that we don’t have to be careful not to 
wake the baby. What about that pair of brass candlesticks, gathering 
dust, and those picture frames minus pictures, and some woodworking 
tools, unused since I built the garage - shall I ever build another, 
and if not what am I Keeping them for? That mattock, sickle amd pick; 
Unused since we broke the section in, the piles of Kids’ games, toys 
and clothes, long since grown out of, and that vase (unloved and 
unwanted) that Aunt Mary gave us. She’s gone now (poor old soul) se 
perhaps the vase can too, though not to the same place, but steady 
now, would anyone really buy this junk; and anyway it doesn’t all 
belong to me! Days’ later and $130 better off; we learn that ves, 
people really do buy junk. Still can’t get that printer I would like, 
but its a start. 





We (wife joins im this time) take a cold, hard look at our 
accumulation of. possessions. -.looking for bigger game this time. Now 
those golf clubs standing in the corner of the garage 
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since 1979, they can go, and that concrete wheelbarrow, much used when 
laying paths and idle ever since, and the piano sitting solidly in the 
family rcom; supporting two pot plants and a photograph of Aunt Mary 
(p90r old soul) - a bit of pine shelving could do that Job, and the 
Kids prefer horses to Haydn. Be practical, we think, and cut with 
these never-to-be-realised dreams, provided that you can get cash for 
them of course. 

More days later and that printer is getting closer, and if we can do 
+ a can you! Put Beeblet done NOW! Get up and go to it. Good 
uck, 

{ But please drop me a line when you've tried it - Ed.) 

GROUND RULES FOR PROGRAMMERS 

Contributed by Jill A. 

{. When you dan’t Know what youre doing: do it neatly. 

2. First write your program, then draw your flowcharts. 


3. Experience is directly proportional to the number of compilations 
plus dumps squared. 


4. Documentation is useless. It indicates that you haven’t been 
working. 


5. Don’t waste time looking at the hill in front of you. Climb it. 
6. In case of doubt make it sound positive and convincing. 
7. Do not believe in miracles; depend on them. 


wren is built on teamwork; it allows you to blame someone 
else. 


No program is a complete failure; 
it can always be used as a bad example. 


(From the "earlier age" referred to by Brian H,. ? - Ed.) 
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TELETEXT TITLE PAGE 


Warren W. 


Have you ever felt just a bit bored whilst sitting, watching, waitng 
while a program loads from cassette? Yes! ell it is not too 
difficult ta create a screen full of Teletext graphics or text to gaze 
upon while your main program loads. This title page can be ‘tacked’ 
onto a short program which loads first and then CHAINs your main 
program. if RAM space is at a premium you can include things such as 
ENVELOPEs, VDU 23 character definitions and function Key definitions 
for use in the main program. The first step is to design the title 
page. Use a sheet of graph paper or squared paper with a grid 46 wide 
by 25 high. Play about with a pencil and rubber until you get it 
leoking the way you want it. Chapter 2& in the User Guide gives a 
brief introduction to some of the things that can be done in MODE 7. 
Having got your design sorted cut you must then encode it. The full 
set of graphics shapes is given on pages 488 and 489 of the User 
Guide, together with the codes that generate them. Choose the 
appropriate control codes for the beginning of each line to set 
foreground and background colours, flashing, double height as 
required. Write down the codes for each character position, line by 
line, then write a program tc PRINT the codes to the screen, such as 
in Listing #1. This program works as follows: 


Line 10 sets Teletext MODE, 

Lines 2@ through 6@ form 4a jloop which reads each code in turn from 
the DATA statements, stores the code in the screen. memory (which 
starts at address &7C@6), and also stores a copy of the code in memory 
Starting at the address &78@@. 

Lines 7@ through 31@ are the DATA statements which contain the 
codes, line by line, that make up the title page. 


Having created a copy of the title page in memory at &78@0 we have 
built the cart, so to speak. Now for the horse, in the form of a 
program that we can hitch our title page tc. This program must be 
designed ta load the, title page from cassette and display it on the 
screen, Look now at Listing #2 which does the following: 


Line 1@ sets Teletext MODE. 
Line’ 2@ turns the cursor off. 
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Lines 38 through 5@ form 2 loop which copies our title page, four 
bytes at a time; from an area of memory immediately above cur BASIC 
program to the screen memory area starting at &7C08. 

Line 60 creates and clears a text window so that we can Keep tabs on 
how the main program is loading. 

Line 7@ sets control codes for alpha white at the left hand edge of 
the window. 

Line 86 CHAINs in the main program. 


Now to hitch the cart to the horse and put it in the stable. We must 
copy our title page down from where we parked a copy at &7&8@0 to the 
area of memory immediately above our BASIC program at TOP. Then we 
must Save our program along with the title page on tape. 


as RUN Listing #1 and then loaded or typed in Listing #2, now 
ype: 


FOR 1%=0 TO 999 STEP 4:1%'TOP=]%'&7800:NEXT 1% 


then press RETURN. This copies the title page down from &788@ to TOP. 
Next type: 


PRINT~TOP+1000 


and press RETURN. This will give an answer, in hexadecimal, which we 
will call XXX. Now get your cassette ready and type: 


#SAVE "PROGNAME" @E0@ 30OX 


where PROGNAME is the name that you want your main program to be 
loaded by, and XXXX is the result that we got above. Upon pressing 
RETURN your title page of 1900 bytes together with the BASIC program 
starting at address &@H90 will be saved onto cassette. The final 
thing left to do 1s to Save a copy of your main program immediately 
following this on the tape. If you then rewind the cassette and type: 


CH." PROGNAME” 


then press RETURN, you can sit back and admire your handiwork while 
the main program loads. 


{8 REM TITLE2 

28 MODE 7 

SB'YOU 23:8282:838 56; 

48 FOR [48 TA 999 STEP 4 

56.04 '&7E88=14!' TOP 

68 NEXT IY 

78 YOU 28,12,22,29,19:015 

90 PR7FR3195: RPE OBES: Mk ZF O3R1 99: 2&7 FBR 135 


98 CHAIN" 
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m PLUG FOR THE BEER 
Anton £. 


This is not an advertising plug. That’s Barsons/Whitcoulls/etc. 
problem. But when you look at a Beeb, it is riddled with sockets. 
This article discusses three of them: the power , disk and printer 
sockets. To wit, how to fill the aforementioned socket with plug and 
cable attatched thereto. 


Easiest method: buy them! 


The Wellington croup makes up cables. It is that experience that is 
the basis of this article, e sell printer (data) cables for $27, 
disk data cables for $23 and the power cable for $12; plus $1.00 p&p. 
Profits (small!) of local sales go locally; but if you write into the 
national group, {rather than get them at our meetings) then the profit 
goes towards the magazine. They who drum up business shall profit 
therefrom. 

The data cables are obtainable commercially. Wisemans (Vivian 
St.,Well.1) will post disk and printer data cables, but do not indulge 
in the time consuming occupation of making power cables, Their prices 
are unknown, probably about $5 more than the user group. Main centres 
should ali have a local Wisemans equivalent. 


Worst method: make them yourself! . 
Actually, the data cables are easy to assemble and merely require the 
insulation displacement plugs; the cable and a willingness to practice 
@ VICE, 


DISK DATA CABLE 
Parts: 

(1) A 34 way insulation displacement plug (eg 34-3414) and strain 
relief for same. 

(2} One metre of 34 wire ribbon cable. {Any longer and you can 
get interference problems. 

(3} 34 way edge connector. ‘eg 3M-3463) Two of these if two drive 
units are being connected. 


Insulation displacement plugs are easily connected: thread the cable 
through the serated slot, press lightly together with fingers to get a 
correct fit then: press firmly together in a vice. About 5 minutes to 
make a cable, and ali you have to worry about is if it works! 
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PRINTER DATA CABLES 


Parts: 
F — A 26 way insulation displacement plug and strain relief to 
matc 
(2) 1.5 metres of 26 way cable 
(3) Printer plug: these vary and you had best look at your 
printer to see if it matches that drawn. Some are screwed home, but 
the Amphencl plug shown has notches either side for wire clips. 


Both printer and disk data cables are assembled in much the same way. 
The numbering of plugs is: Imagine you are the socket icoKing at the 
plug. Then numbering starts top left: 1; below to 2, diagonally up to 
3, below to 4, etc, 

Assemble as in the diagrams. Feed the cable down inte the BEES end 
plug, crimp, then bend the cable down before fitting home the strain 
relief, The other ends may not meed the cable fed in from the top. 
Either way should work, provided wire i is in its correct slot. 


Both the 26 way and the 34 way plugs into the Beeb should have a 
strain relief clip at the back. the main use is to hold the firmly 
into the Beeb. The cables can be quite wasteful of wires. Firstly, 
only half are used: The even ones are all ground returns. But this 
construction is good at preventing radic interference. Then some of 
the disk wires are not used. 34 wires are standard, But not all are 
implemented on a BEER. Pins 2,4,4,14 and 34 are not connected. All 
this information is interesting, but irrelevent. The printer cable is 
also short of wires - aS you can see from the assymetric way the 26 
way cable is fitted. The exta ones are mot needed: one for instance 
is to signal back that the printer is out of paper. This is useful if 
the printer is miles away, but irrelevent to our needs. 


POWER CABLE 


The power cable is very bothersome to make up. There are 5 sources of 
supply: i. AMP 6 pin plug; strain relief and 3 pins (AMP 
connectors, Olive Road, Auckland), 

2. Self tapping screw with top filed off (for strain 
relief) 

3,--Rubber grommet.( Pararubber, no.2) 

4, Three core power cable (1.5 metres) 

5. 41n line plug and 3 pins { Wiseman’s ) 
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{4 core cable and two earths can be run if desired.) 


Bare the wires at each end, solder seal, crimp home the pins and 
resolder. Push on orommet. Push pins home into AMP plug, and 
matching pins into plug. Fit on strain relief while cursing the 
grommet (not a good fit! ). Test to ensure no short circuits, and all 
correctly fitted. Plug into Beeb. Test that the i2 volt and the 5 
volt outputs are correct. THEN plug into expensive disc drive. Sit 
back and wonder why you bothered; instead of buying them. — 


The cables are made by the Wellington group, but although we can flog 
them off cheap to you, please feel free to make your own... 
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RELOCATING WTEU 


Kerry K, 


One of the selling points of the 6502 Co-processor as far as I am 
concerned is its ability to run standard languages etc with none of 
the hassles of limited memory size in high resolution screen modes. 
For instance it would be nice to use View in mode @ with bulk storage 
available. However true to form Acorn have either completely missed 
the point or choose to ignore it (1 guess it would take someone with 
the source of View a whole half an hour to oroduce a version of 
HIVIEW). Presumably they will eventually catch on and we can expect 
an announcement of a version of View for the Co-processer Gin about 12 
months), In the meantime I decided to do my own. After 3 days 
intermittent sweating over a disassembler I had a working version of 
Hiview relocated to &C0@8. This gives approximately 48K bytes free in 
any mode. The program listed below allows the user to take a disk 
based copy of View At.4 produced by the method described in the 6592 
Co-processer user guide and produce a relocated version with the name 
of their choice. The program has only been tested om my own copy of 
View but it should work on others. If you have version Ai.4 and the 
program complains about checksum errors, remove line 1@@. I make no 
Guarantees that the resulting product is errors and I take no 
responsibility for loss of data resulting from its use, however it has 
been extensively tested and seems to function correctly. 


1GMODE 7 

2APRINT "PROGRAM 10 CREATE A HIGH VERSION OF VIEW" 
SOHIMEM=& 3008 

4QINPUT “ENTER INPUT FILE*;1$ 

SAOSCLI "LOAD "#1$e* 3cag" 

55CS/=8 

SBFOR I¥%=0 TO &2012 

PACSY=(CSU4IZ2R3C8B) AND &FFFF 

SBNEXT 1% 

OOPRINT "CHECKSUM IS *:-CS%: 

1BB1F CSY<3&R0A THEN PRINT" SHOULD BE @@A":STOP ELSE PRINT 
L1BINPUT "ENTER OUTPUT FILE NAME* 5 

120FOR I¥=1 70 714 

{3BREAD AY 

14BAY2&SCRO=AY7&30084440 

{5@NEXT 1% 

1SG0SCLI "SAVE' "+¥$4" 3008 +2012 cBR8 CeO" 
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t{7OPRINT" COMPLETED. * 
JBBBDATA 82,853,856 &SF 472,477 A9E bd AAC e117 

{BIBDATA £420 2148 ,&144 ad 4D, &158, bi5A 15D e165 4168 8148 

{B2BDATA &187 e180, 4196 ‘ula, 4iBd, {BE "&1D8 iPS, 4207 &273 

{B3QDATA &254 425C, 4282, £285, 828A, ‘E280 8298 &293, 14296, SAB 

{@48DATA BIAE .&2BA, 20D, ‘&2D8, "&2DD 260 G2EB WDE APF 4 2F4 

{O58DATA &2F9 ,&2FC X2FE 4365 ,4388, &38B A38E aH 1 8316, 4319 

{ASADATA &3iC 431 F 328 £328, 4332 4335 4338 338 345 e358 

1B78DATA &353 4356 &35D 8361 43964 4367 436A, 'SG4F W376 &379 

{G80DATA &376 8381 £384, 438? 39C, "4384 GEE, 'E3F6 is) ARE 

1O90DATA &481 4404 487 hd, 'a40F 425 428, 4428, ‘4425 4433 

1iBSDATA &439 e43C jh44! 4454 0458, 446i &464, e468, 4488 4483 

1118DATA &48E 849 4494 &497, £494, £490, 4482 '&4BF AC? 4405 

112BDATA &400 e407 S400 4462, dE5, ‘AFD 500 4583, 4586 4569 

1138DATA &522 5264 WORF £557 550 “SOSF 6542, &545 £570 ABD 

1146DATA &5C8 4504, "&SDB "ASE? SFB £403 4628 4630 642 ,&645 

115BDATA &648 &65! 4654 4659 4664, 4684, &6B9 £488 &4C4 607 

1148DATA &4D1 4408, "46ES SEA AGED KOFD, "4708 8709, 4780 a7! 

t17BDATA £717, A716 8744 ,&768, 8273, 476 M2 7F FS, LIF 6 ATFF 

L18BDATA £808 812,481? 4833, &B3A, SAB, "AB6E 4884 4891 ,&BA? 

F198DATA &803, 4806 ,48D2 4965, &8FF 4923, 4955, 494 GAC £455 

i2QBDATA &ASF AAA ASD SAAD AAD "KARO B24, "4B27 ‘&B3C "&B58 

{216DATA &850, &B99 eBIC BCE ADB, "BE@ WBE, “&BES ‘ABES, eC17 

1226DATA &CIA 423, 429 4033 4034, 4049 '&C5D, aC #043 4668 

{236DATA &CA4 ‘eC e003 'eCCA, &CD? uCDA, '&CFA, "4005 8088 88 

{248DATA uD11 8014, &D17 Dia e034, ‘ADBC DAB, WORD, 'EDDS '&DE? 

1250DATA &DEA ,&0FF GEOR, 'BEBB. aid E28 1&E39, 4E9S REA EBD 

1L2600ATA 4EDE, SEES, 'REEB, 4EEE EF uF AD ak 18 GF 28 ,&F23, &E 2? 

1270DATA &F34, GES, GF 44 &FAF VaF52 V&F57 uF SA UPSD .&F74 E77 

1280DATA &F7C, “EFF aF92, &F 85, &F RB, AFAR RFAS, “AFA, IAFAC, LFBI 

129BDATA &FB4, 'AFCB, 'aFD4, "GFE, GFE FES RFES, “AFEC AFEF £1823 

{3BGDATA 41026, bIB3A, £1647, &iB54 199A 1890 1048 41 BA3, & 1006 At BBA 
1Z18DATA &1aD9 ed 5, ui 14D, ad 158, at Se ui 1B dd {7 MA E7E 41180 kt 195 
1320DATA &119A, HHIA2, ahIAA Vd 1B2 IBA 1102, AI ICA ed1D2 &SIEC, AIFS 
{33BDATA &11F6 "kl 1FB veel 203 4&1 236, &124F £1250 1 260 &1297 41283, “a 2BA 
1348DATA &12C2, "41 2CF , £1 2DD kt 2E6, bi DEC 41 2EF Wh 2F2 4131! 41329, 4435) 
1356DATA &136F, "41970, 132 ad 3F 4 al 45F i402. kl 4AF bl 409, ki 46 41554 
1368DATA &1557 ul 554 4}55D, &1562 41589 yh 158341586 41580 21586, 41589 
1370DATA &15AC, LLSAF a15C7 i500, "&15E7 aL 5FA. "44488 4 628, 141642, 44645 
{380DATA ised, £1669 vad 68E, '&id7i 169A a1 303, &1 606, U1 6D9, 'e160C, 44 6E3 
{390DATA &1dEA, 41705 ‘ed 70C, kE7HE 41723 ul 732, "44740 ud 74? a1757, ti 760 
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14RQDATA &177F 61788 85793 &1 7A4 84 783 hi 786 81708 83 7D Al PEP R17 F2 
T418DATA &17FF ,&188A 81812 i819, &1929, 1846 £1 84D 41856 81858, 1195 
1428DATA 41861 41878 £1978 A1BAC, &1903 ,&18E? 1988, &}983 83 960, 1945 
J438DATA &19IC 81920 £1931 81934, &1943 1 94E 81959, £1966 81940, 41973 

{44RDATA £1976 t1981 ,&1994 1987 198A 81998, &I9PE, L194! 1944, &19A7 
1458DATA &19AE 1 981 ,&1 984, Qi SBF G1 9CA £1 DEA a1 PED v&19F9 iki FB, W182 
1468DATA &1A27 41038 ,&1ASF eiA42, &1A49 &1A4C kIAIF 1 AS2, IASC, 8178 
147ODATA &1A96 ,&1A93 RIAD MIABE, ASABE ACE SATB A1ACE ,&{AD1 AIAD4 
1488DATA RIAD? ,AIADA, GIADF &IAES A1AEB ELAR? pRSAFS S1AFS AIAFB &1 B08 
L496DATA &1887 ,&/BGA,&1B28 £1843, tel BBC &1 B93 ei BOF ,&1BA2, ‘AA BAB ‘&1BAE 
1SB8DATA &1BB! ,&1BC6 ed BES, 1089 1 034 el C48, &1C4B 21074, eiC85, 1&1 C80 
1S/8DATA LICBF 41092, RECBC MICDE, tel CED ei CF4 1 DBE, eiDi eiD14 DE? 
LOZBDATA &1026 ,&102D 81046 41D49 64061 144, '&$D92 1 DBS, ie DCF, ‘kl DD2 
1O3BDATA &1DDB, ‘1 DDE WeiDE! ,&1DE4 41 DE7, &IDF3 ui E24 iE! E44, MIEZC 
TS4BDATA &E85, MeLECS UFZ &IF22 G1F4S QF AC WeF88, &1 FSB, eiFB2, i FRB 
ISSBDATA &iFC2, eFC Mel FDB WOB4E, 42060 142671 ,&2077, &207A, 42609, e2BE4 
TOOBDATA &2BFD 2190 821 2D 82133 42138 y213D 42160 ,&21 78 2170, #2187 
1S78DATA &21AE 42788 K22AE ,&2281 , \&22BE e22C1 142206, “&22FB, &233F, 42344 
1S8BDATA &2385, e234 »£23A6 ,&2303, A Q3FE 82415 2410, 249A, 2456, 182463 
1OPADATA &2402 e24C5 £2408 ,&2408 42405 ,&24D8 42514 82525, #2536 2539 
1698DATA &2541 ,&2578 ED5C7 ,& 2486, &2654 y&2674 ,&267D £2689 ,&26AC, 82688 
L6BDATA &26C1 ,&26CE 42654 We DAEF 42738, 82748 ME27AE 42785 8279082826 
1é28DATA &2865 182867 42869, 2868, £286) ,&286F 8287! £2873 82875 ,&2877 
1638DATA &2879 42878, &2870, &287F 2881 ,&2883 42885 ,&2087, ‘2889 42888 
1648D0ATA &2880, e288F 142891 .&2893, &2895 2897 ,&2899 &2898 12890, 8289F 
1SS8DATA &28Ai 182863 82585, &2847 WA2BAP 2BAB \&2BAD VE 28AF 4288! “&28B3 
16S0DATA &2885, 42887 82889, 42888 E2880 ,A2BBF , &28C1 82803, 82805, &2807 
1678DATA &28C9, &28C8 WRIBCD L2BCF , &28D1 ,&28D3 ,&28D5, 82807, 1&2809, 82808 
1688DATA &28DD, WA280F \82BE1 ,&2BE3 42855, 82087 Wk 2E9 WE2GEB, A2BED, VS 2GEF 
1698DATA &28F 3 We2BF3 ph 2BF 5 &2IES E29EB A29ED, 'LO9EF K29F 1 ,&29F3, &29F5 
E78GDATA &29F? WA29F9 A29FB, &29FD JE29FF 42401 42883, 42405, &2A9/ 22809 
S7{BDATA &2AGB ,&2R8D ,&2AGF &2Al i 
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EPIT YrYouR OMP USER 
DEFINED CHAS RACTERS 
Neville T. Christchurch 


How much easier would it be if you could edit your user-defined 
characters directly on the screen instead of having to redefine the 
whole thing! 


This short routine mot only allows you to enter and edit your 
characters by drawing them as they look on the screen, but it is also 
short enough to be incorporated as a single key definition! 

First of all, lets have a look at how a user defined character is 
stored in memory. 


The BBC micro uses one page of memory from &C@O to ACFF to store the 
information. This is "divided" into sections of & bytes, each byte 
corresponding tc one row of a character. The first 8 bytes relate to 
CHR$225 etc... right up to CHR$255 (allowing you to define 32 
characters), 


OK, heres the program you can use to define a character: 


10 MODE 7: INPUT TAB(10,10);"Enter which character ",char 
20 X=0:¥=O:MODE 7? 


30 REPEAT 
40 PRINT TAB(X,Y); 

50 Q=GET 

60 X=(X+(Q=90)-(Q=88) }MOD8 
70 Y=(¥+(Q=58)-(0=47) )MODS 
80 X=X-(X<0)*8:Y=Y-(¥<O) *8 
JO ?(HIMEM+X4+¥*40)=Q=32 


100 UNTIL Q=83 

110 I=0 

i2O FOR Y=0 TO 7 

130 C=0 

140 FOR X=0 40 7 

150 C=C+{2A(7-X}) AND ?{HIMEM+X+¥*40)=255) 
160 NEXT X 

170 PRINT TAB(2-4,Y¥)5C 

180 ?({(char-224 }*8+8&CO0+1)=C 
190 [=I+] | 

200 NEXT Y 
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Of course, this could be compressed into cne Key definition by using 
abbreviations, as follows: 


*K OX=0:Y-O: VDU22, 7:REP.:P.TAB(X,¥)::Q=GET:X=(X4(0=90)-(Q=88) )MODS: 
Y=(¥+{Q=58) -(Q=47) )MOD8: X=X-(X<0) *8: Y=Y-(¥<O)*8: 7 (H. 4X+Y*40) =0=32: 
U.Q=83:1=0:F. ¥=0T07:C=O0:F.X=0107:C=C+(2A(7-X)A. 2 (H. +X4¥*40)=255): 
N.:P.TAB(27,Y) 30:2 ((g-224 )*8+8CO041 )=C: T=T41 NIM 


NOTE: If you are using the Key definition, you will have to define the 
variable ‘g’ as the character you want to define beforehand eg. type 
"g=224" then press the function Key to define CHR$224, 


Now, lets have a icok at how it works. 


Looking at the program, first of all it asks you which character you 
want to define, and stores this as the variable ‘char’. The program 
Hel by showing you a blank screen which you can move around using 
he Keys: 


é Cleft) M (riqht) 5 cfinished) 
: Cup) “ (down) (space? torint a Black 


Thus; you move around an OX8 grid; pressing the space bar to insert a 
Dlock and in this way draw the character you want to define. To wipe 
out a block, just move over the top af it. When you have finished, 
press the ‘S’ Key, and the character will be defined and stored in 
memory as CHR$char. 


X and Y are the variables where your cursor is present on the grid, so 
always hold a value between @ and 7. The program will loop in the 
cee Westies in lines 36-100 until the ‘S’ Key is pressed (ASCII 43 
- line 16@). 


In this loop, your curser is printed (line 40), then the BSC waits for 
you to press a Key (line 50), storing the ASCII value in the variable 
. The mew X and Y, coordinates are worked out in lines 69-30. For 
pace of you who are not familiar with the method used, it works as 
ollows: 


A AA, SNE) menmerv mes ce es eee eg ce Rc cei eis le ee 


The ASCII value for Z is 96, Xis 98, : is 58 and / is 47. 


So, if 2 is pressed (left), (Q=99) will be true, returning a 
value of <1, but (Q=$8) will be false, returning a value of 
MOD @, Line 6@ then becomes X=X+(-4)-@) MOD 3, or X=X+{~1) 
&, Hence, X will decrease by 1; a movement left. The MOD $ 
just ensures that you stay on an 8X@ grid. 


Or, if the X is pressed (right), (Q@=9@) is false (0), but 
(Q=88) is true (-1}, Line 460 is now X=X+@-(-1)) MOD 8 or 
X+(X+i} MOD &. Hence, X will increase by 1, a movement 
right, 


The same applies for up and down movement, in line 7@. 


Line 8@ is a "wraparound" feature, ie if you go off the left 
edge of the arid; you will appear on the right edge, or if 
you go off the top of the grid, you will appear on the 
bottom. 


It works like this: 

If you are off to the left side, X is -1, so (X¢@) is true 
(-4}, Line 8@ will then make X=X-(-4)#8, or X=X-(-&) or 
X=X+&, Since X is -1, the new value for X is -1+8, or 7? 
(the right hand edge). 


Line 9@ comes into effect when you press the space bar (Q-32), as the 
ASCII of a space character is 32, It works by poking a value directly 
into screen memory. 


The start of screen memory is held in the value of the pseudo-variable 
HIME M, so, when the space bar is pressed, we want to display a block 
(CHR$255 in MODE 7, but if space is not pressed we want to display a 
blank. HIMEM points to the top left hand corner of the screen ~ see 
figure 1. This is made easy for us, because in mode 7, each character 
is stored directly in screen memory in its ASCII form. 


To figure out which byte of memory our cursor is currently at, we use 
HIMEM (the starting value)+X (how far from the left side of the screen 
we are) + YX40 (Mode 7? has. 4@ characters per line, and Y holds the 
number of lines down the screen that we are), 


ee A , PE Eee EE Sy Gy eetebie Ge EE: GEE epee eee Ciba, pick SE, . Se, eS, Cee. ey, Ee ee eee 


SS ES A es iy a i a , : SN eid Reig ey a a SS A el 








figure i, 


Look at the above diagram. HIMEM is the top left screen corner. As 
there are 4@ characters per line, and 1 byte per character in Mode 7, 
the Mode ? screen top right is at HIMEM+39, and so the beginning of 
the second line is at HIME M+46. The numbers tep and down the left 
hand side are the X and Y co-ordinates of the screen. So, by way of 
example, when your cursor is at position ‘X’ on figure 1, the values 
of X and Y will be 3 and 2 respectively. Using our formula, the 
character currently printed here will be at HIMEM+X+VY#4@, or at 
HIME M+3+8@, or at HIME M+S3. 


We can print a character anywhere on the screen by poking its ASCII 
value into the corresponding memory location. So, when the spacebar 
is pressed, we want to print a block {CHR$255), so we poke 255 into 
memory. Hence, if the spacebar is pressed; (G@=32) in line 7@ is true 
(4), and the memory location has -1 written to it. As this memory 
location can hold only one byte, writing -i to it stores &FF for 255) 
there - check this by PRINT ~-1 (print the value in hex of -1). 


Since CHR$255 is a solid block in Mode 7, and 255 has been stored in 
this location, a white block appears at the cursor when the spacebar 
is pressed. If the spacebar is mot pressed, line 7@ stores a @ to 
that location { because (@=32) will be false or @}, and se the 
position at the cursor will hold a blank (mow you see why your solid 
white block disappears when you go over it again with the cursor), 


OK, that takes care of how you draw your character on the screen. Now 
comes the REALLY tricky bit - storing what you have drawn as a 
character in the memory. This is taken care of by the rest of the 
program. To store the character, we must calculate a value for 
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each row, just like you have to do when working out a definition on 
paper. (Editor’s note : actually, its easier tc read each group of 
four cells off directly as a hex number - with a little practice you 
soon remember the patterns...). These values are then stored in the 
BCOO-&CFE area of memory to define the character. 


So we need 2 loops - one ta read across the character and one to read 
down (lines 126 and 149). I is a variable telling us which row we are 
up to, and holds a value between @ and 7. C is calculated as the 
value of that row. 


lam assuming that you are familiar with how you find the values for 2 
character by adding across the row; with the rightmost bit a a 
value of 4, and this doubling as you move left until the leftmost bit 
has a value of i2c, See figure 2 for clarification. 





Value=64432 - 96 

value=16 =16 

value=64+32 -96 

value=16+1 =17 — 

value=644324241 -99 Define using: 

hae Ne ze VDU 23,x,96,16, 96,17, 

value=4+2+} = ee 
Decals aeasae Shay vaiue=l a agile 


figure 2, 


Line 150 calculates the value of each row. The column value is 
calculated by 2°(7-X) ie when you are on the first columm X=@, so the 
value is 2°7, or 128. When you are in the right mast column , X=7, se 
the value is 2°@, or 1. By ANDing the value of the column with 
whether there is a Block at this position or not, and adding these, we 
end up with the correct, value for that row. 


If there is a block at that position, 7{HIMEM+X+¥#40)=255 will be 


true, and return the value of -1. If, say, the column is 64, 64 AND @ 
gives @,; so C will have @ added toit. See how it works ? Any number 
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26 


AND -i gives that number back, and any number AND @% gives @, 50 we end 
up with the correct total for that row! 


Line 78 prints the row value on the screen, and then line 1&@ pokes 
the value into user-defined character memory before increasing I and 
moving on te the next row via the loops. BUT, how do we know where to 
store the value of the row to define our character? 


Here comes another interesting piece of maths: 


As mentioned before, we must store the value somewhere in page &C60, 
sc we can use &C@@ as an absolute starting value. Look at line i8@. 
Remember, the variable char holds the character we are defining. Sc 
if char is 224 (the first character in page &C00), by subtracting 224 
we get @, which points to the first byte in page &C@@, Or, if we were 
defining CHR$225, we would want to be concerned with the second set of 
8 bytes in page &CO@, so by subtracting 224 we get i. Now if we 
multiply the (char - 224) by &, and add this to &C00, we get the 
starting memory position of the character we are defining. 


For example, to define CHR$255, we would be looking at the last & 
bytes af page &Ce@, cr &ACRS-&CRF. We can find this position by using 
(char - 224)#8+8C0@, as this gives us (255-224)#8+8C00, or &CeO+245. 
As 248 in hex is &FS, &C@O+&FS gives us &CFS, the correct starting 
position. 


So, we must poke the values of the & rows of our character into the § 
consecutive bytes starting at the value given to us by (char - 
224)#8+28.009 in order to automatically define our character. 


This is dane using cur row counter, I, For example, the value of the 
Sth row of the character in figure 2 is 99. Because this is the fifth 
row, we want to place it in the fifth byte from the starting position. 
When we are. calculating this value, I has the value 4, so by adding I 
to our little formula, we can Get to the fifth byte. 


So, the final formula is (char-224)#6+8C6641, which is what appears in 
line 180, Cis the value calculated for that row in line i158. 


Well, that's how you manipulate data for a user defined character. In 
the next article I will describe another short program, but this one 
will draw an already-defined character on the screen; and allow you to 
edit it and restore it in memory. Quite a time saver! 
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BBC Ze : 
Molumerx SOFT WARE ages 


The MOLYMERX COLOUR SOFTWARE CATALOGUE is ready ! 


Pages of descriptions of new powerful Application and 
Utility software for $3.00 


and THAT's NOT ALL - 


as we publish new software we send you free UPDATES, 
Our offer is to keep you abreast of NEW products, 
NEW services and our regular special prices, 


Some of the products in the latest edition of our catalogue ! 
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Fly COLUMBIA II from space to a Desert landing (if you can !) 


Please use BLOCK CAPITALS 
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Colour Catalogue 
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Molymerx Software Catalogue. Dealer Enquiries Welcome 
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STRUCTURE DIAGRAMS 
(Again) 


Bryan H. 


After two articles about structured program design you may well ask: 
why are all these people raving about it? The reason is that 
structure diagrams are an aid to thought (and programming); not a 
hinderance. They should not be an expert’s tool - everyoe should be 
using them. 


Most books published today and some courses use the older flow charts 
if they use anything. Flow charts are the relics of an earlier age. 
The style of crogramming they were irvented for has now deen 
superseded by advances in computer science, and in Knowledge of human 
thought processes. B.B.C BASIC, along with ALGOL, Pascal, LOGO etc 
have the facilities to use structured programming methods directly. 
The BBC "Proc" is the ideal tocol implement structured programming. 


The method of using the boxes for programs is described in detail in 
the May 1984 issue of Beeblet. By using the shapes representing 
Action; peeeeare and Decision any program or idea can be 
implemented, 


The process is one of successively breaking down the main task into 
sub-tasks. 


eg. 









FIRST SECOND THIRD 
DIVISION DIVISION DIVISION 
The sub-tasks are then successively broken down until it is not 
productive to break them down any further. This way of working gives 


the process its name "Top Down Programming”. (Now you understand what 
its about you can use both terms to impress non programmers.) 





Once your diagram is complete it is convenient to write your program 
in the order it is executed. For the simple diagram below, working 
from the top you should have broken it down in the order 
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4, 2p Sy 45 5) 6) 7p B 9. Your program will follow the order {, 2, 
4,953, bs &: 9) 7. 





To demonstrate that structure diagrams can be used anywhere, here is 
the diagram I drew before starting this article. There has been some 
expansion and reorganisation along the way but I hope that human 
readers are a bit more adaptable than computers. 


AS programs become longer the diagrams become more useful. It is true 
that small programs can be written without formal planning or 
Structuring. Medium and large programs are much easier to produce if 
the planning is done first. Omce the structure diagram is produced 
and the coding starts the programmer only needs to concentrate on one 
small area at a time, literally filling out the coding for one box 
before going on to the next. 


The diagram can be used in two more ways to speed up the coding 
process. Each box can have a line number assigned and procedure names 
can be invented and written on the appropriate (square) Doxes - See 
Warren W.’s article in the June 1984 Beeblet for examples of procedure 
names inside the boxes. I put the line numbers outside the boxes, on 
the top of each box, and use the full range of line numbers. eg, maJor 
divisions would start at 10,000 20,600 36,000 43,060, 


If you start off this way you can give each box a line number without 
fear of clashes. The only disadvantage is the loss of a few bytes of 
memory and perhaps a few Square mm of printing space. 


Structure diagrams are also a useful way of communicating program 
ideas. Maybe you you are only writing for your own machine. Other 
BBC owners njiay be interested in your program, however users of other 
machines (friends, your local school...) will want to Know how it 
works - they can do their own coding and use sections of "standard" 
BASIC from thé Hating. 
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ENCOURAGE THE USE OF 
STRUCTURE DIAGRAMS 


Structure Diagrams 


Structure Diagrams 
are for your use 


are a way of 
recording ideas 


For larger programs 
the diagrams are 
more useful | 





They are an You can use Method of 
aid to prog. them for construction 


Ideas need not Labelling before] } With labelling done 
not &# hinderance any ideas is top down 


be programs writing prog, prog. effort can 
eg.this diagram helps process be concentrated 


They are for Most books Another name Program its PROC, Line 
everybody not] ] use flow is "Top down" generated in names numbers 
just experts charts programing an other order 


Not good 
for Structured 








BBG Basic 
PROG is ideal 


Programing for Str. Prog. 
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Steven R. 
True or false? 


i) The BBC has two different types of file: sequential and random. 
2) The BEC only processes and stores one type of file: sequential. 


Answer: both are true. Confused? Let me explain, 


In my last article; [ told you that the difference between a 
sequential file and a random file is that with a sequential file you 
can’t go back and reread or rewrite something, and with a random tile 
you can. If you remember, [ also said that I was going to bend the 
truth a little. The truth is; sequential files and random files are 
the same physically; but different logically. In other words, the BBC 
stores them in the same way; but you treat them differently. If you 
compare what the BBC has to do to print something physically, taking 
care of scrolling, calculating screen positions etc, compared ta what 
you think of it as doing logically, printing at TAB(3,4) on the 
screen, you will get an idea of what I mean. 


The difference lies in how you use the file. To use any file, you say 
OPENIN or OPENOUT, and then start to read from or write to it as 
appropriate, Usually, you just read everything in the order that it 
was written. But if you OPENIN any file on disc, you can go back and 
re-read an item, or change an item. in fact, you can read or write an 
item anywhere in the file, jumping all over the place at random if you 
want to, so long as the file is on a disc, and se long as you 
OPENIN’ed the file. This is called random access. 


You can do this by changing PTR#, a special pointer that BASIC uses te 
Heep track of where you are in the file. PTR# can be looked at by 
aie A So ac = PTR#channel%”, or changed by saying "PTR#channel% 
= position’". 


There is a slight complication however. An item in a file usually 
takes several.bytes to store. This means that you must Know exactly 
where an item starts before you can read something that is not 
rubbish, or write something without corrupting the file. Think about 
it. ae do you jump over 18@ strings (of different sizes) and numbers 
ina file, 


[oie tei aeeeie ei ee ee Ge ee EE SE ES. SS: EE Ee. EE: EE CE EE 


es ey ee ee ee ee eee ee eee eee eee EEE LES siieiees cel ines ee Se Ee Ee Oe 


and stop at the exact right place? His just a little bit tricky, 
isn’t it?) «If there are oniy integer numbers, then it’s easy, because 
integers are always stored in the same number of bytes. The same 
applies to real numbers, Strings, on the other hand, are usually of 
varying lengths, and you’d need ESP to Know the length of 1098 strings 
that you haven’t looked at. 


How do you tell where the pointer must be slaced? One way is to store 
your information in a set order. This way; you can predict where the 
start of any item will be by multiplying the number of items that you 
are skipping by their length, and adding your current position. You 
will have to Know how many of each type there are, and how long each 
string is. You can then calculate where to set PTR#. 


Another way is te store pointers in the file. Each pointer points to 
the start of an item or group of items in the file, so to jump 
somewhere; you Just set PTR# to whatever the stored pointer is. This 
could mean following a chain of pointers through the file until you 
get to the place you want ta be. If you want toe go backwards, it may 
also mean that you need a pointer to go backwards, which will use up 
more room. Both of these will depend on how you designed the file. 
The biggest drawbacks with pointers are first, if you move something 
in the file; you have to change all the pointers that point to it so 
that you can find it again. Secondly, pointers use space in the file. 
The advantage with pointers is that the order of the information 
doesn’t matter. You can insert something in the middle of the file by 
putting it at the end, and altering the pointers to point to it. You 
can delete something Just as easily by changing the pointers to miss 
out what you want to delete. This is called logical deleting, because 
the item is still physically there. Logically deleted items can be 
undeleted again so long as you Know where they are. 


The other way of finding information in a file is by having a separate 
index file, which contains a Key, and a pointer to the data file, for 
each item. The Key can be anything that is unique in the file, like a 
telephone number, a surname (not as good), or an invoice number. To 
find something; you search the index file for the correct Key, and 
then use the pointer with that Key to set PTR# in the data file. The 
index file should have Keys and pointers of a fixed lenqth, and. should 
be in some sort of order, so that you can use one of the fast searches 
to find the Key. Searching techniques may be the topic of another 
article, depending:on the Editors’ persuasiveness. 
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There is one last method. You can cesign your own way of storing 
things. [If you are only staring one type of information, or if the 
order of variables will always be the same, then you don‘t need the 
variable type indicator that BASIC stores. If you are only using 
numbers of 255 or less, then you can store them in single Bytes. If 
you are storing a lot of text, you might want to compress it to Save 
room, and therefore te store it in your own way. The drawback is that 
you have to handle the storing and deciphering of the information. 
The advantage is that you are saving room, and possibly speeding 
things up, or making the logic of a program easier. 


Before J talk about the uses of random access files, 1 must warn you 
of some pitfalls. First, if you are overwriting something, make sure 
that what you write is the same length as what was already there. If 
it isn’t, you will probably corrupt the file; which is almost as bad 
as deleting it. Second, make sure that PTR# is set to the exact byte. 
If it isn’t, then you will be reading Tabak cr writing in the 
wrong place, which will corrupt the file. Third, the token for OPENIN 
that BASIC I uses is different for BASIC IJ, so that if you run a 
program on a BASIC I machine; it may not work properly on a BASIC II 
machine. Also; BASIC !] uses OPENUP for randem access; NOT OPENIN. 
Fourth, when you open a new file te write to it, BASIC allots a set 
amount of space on the disc. It is quite easy to try to write past the 
end of that area later, using random access, which will give you a 
"can’t extend" error. This will anly happen if your file is not stored 
last on the disc. If it is, then BASIC will just give you some more 
room, 


What do you use a random access file for? Well, anything that can be 
done with a sequential file can be done with a random file, because 
they are really the same. Random files come into their own when you 
want to do something fast or tricky. The standard example is 
something like: 


Given a phone number, find the name, when the file is in 
name order. 


With a seqential file you would read all the way through the file 
until you finally found the correct phone number, and then get the 
mame that went with it. With a random file, assuming that you had an 
index file of phone numbers, you would find the required number in the 
index file, uSing a fast search like a Binary chop (...the imagination 
bogales...fd.), and.then go straight.to the right place in the main 
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datafile, using the pointer stored in the index file. Often, because 
you are only storing the Key to each block of information rather than 
the whole lot, you can load the index file into memory. This often 
Speeds up the search and the reading of your information by an 
incredible amount, 


For those of you who are a little more adventurous, try this. Create 
a file containing data on all of your records and tapes, organised in 
such a way that you can: 


{. Read the titles of all records that you have recorded on tape 


2. Read the titles of all tapes and records with a given performer on 
them 


3. Read the titles of all records or tapes produced by a given 
performer 


Easy? Well, I haven’t told you the last requirement. You must only 
read the record/tape information for the category that you were 
looking for, You can’t read information about other records or tapes, 
and then just print the ones that you want. 


Harder; isn’t it? It can be done using pointers for each category of 
information, that point to the next item in that category. Same 
record/tape information will have several pointers to or from it, one 
for each category. You will find this difficult to set up, but fast 
te use once it has been set up. 


Well, that’s all, folks. (It isn’t, of course.,. Edw. Remember that 
random files exist when you are designing things and remember the 
usefulness of pointers, whether in a sequential or random file. 


Comment: 
Could someone please explain these "pointers" : exactly what are they 


and how do you go about using them ?” -Ed 
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CHECK EINSTEIN'S EXTENSIVE RANGE 
OF PRINTERS AND OTHER EQUIPMENT 
FOR YOUR BBE OR ELECTRON 


*177 Willis Street, Wellington 
Phone Raju, Michee) or Malcolm 651055. 

*154 Broadway Ave, Palmerston North 
Phone Richard 64108. 

*Cnr King & Egmont Sts, New Plymouth 
Phone Bill or Saliy 65528. 

*Shop 41, First Floor, Cashfields Marl, 

Christchurch 

Phone Mike 66442. 

*inside DIC Ltd, Garden Place, Hamilton 
Phone Atbert 81969. 
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The computer world made simple. 
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Michael G. of Feilding writes: “One problem that I have had when 
loading games from tape to disc one or two have come up with BAD MODE 
line... If I alter the mode the colour of course changes. Could cne 
of the members help me?" 


Michael, I think the problem relates to the extra memory which the 
disc drive grabs compared to the tape system. For some games, typing 
in something like Page=&120@ before icading them works. 
Alternatively, once you have loaded them from disk you can type in #T. 
(switching back to tape operation, and memory allocation) and then 
move the program down in memory. One game I have includes the 
following function Key definition to move the program down: 


1 #KEY@ #TAPE!MFORIV=8T0 TOP-PAGE STEP4:IZ!EQG=1%!&1 98 
8 :NEXT NPAGE=GE@@ {NEND IML ONEM=TOP IMGOTO! 81M 

2 ¥FX £38,6,1 

3 ONERRORDELETE 1,4 

4 ERROR 
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Andrew Ammundsen of 5 Joanna Place, Hamilton, writes, "Having bought 
a number of game programs and then getting tired of playing them, 
would it be possible to sell or swap them with other BBC owners. I 
have such games as Cyclon Attack, Vortex, Twin Kingdom Valley, Lunar 
Rescue, Planetoid, Hunchback and Danger UXB. I am not sure if you 
agree with members swapping or selling software through your magazine; 
but after spending lots of money on games it seems a waste that they 
now get little use." 


The main problem here Andrew is the temptation to retain a copy when 
passing on the original game. This would be a clear breach of 
copyright which Beeblet could not condone. However, if people wishing 
to swap games were to provide an undertaking that they would not Keep 
a copy, I think thig should be OK. I suspect you may get into a 
slightly more ditey situation in the case of resale - perhaps one of 
the dealers might like to comment. 
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(Waitaki Boys High School} have just put in an order for a 15 station 
Econet and ] hear that Southland Boys; Girls and James Hargest schools 
are doing something similar in Invercargill. Add to that the 15 Just 
installed at Christchurch Girls and there is a rapidly growing user 
group which could scon ease the burden of lack of news for the 
magazine. 


satave yOu come across problems with discs formatted on different 
machines - trying to read them on your own? I had happily assumed 
that the only differences were 40/80 track and felt utterly confident 
with a switchable disc drive of being able to read anything on a 5.25" 
floppy (apart from network format, of course}, Not So simple however 
- I observed a colleague at a course having troubles with different 
machines from different schools and my neighbour’s 4@ track (!} won't 
pick up through my system (although when I format a 4@ track for him; 
he cam run my dises'!), Is there any way of identifying a "friendly" 
— without waiting for the drive’s groans and "disc fault at....' 
etc? ", 


Alan, I have passed your note to Tony K. of Barsons (and Chairman of 
the Auckland branch) who, in the June issue, offered to run a "Tell 
Tony" column. Just a reminder: You are all welcome to send your 
problems, even if you suspect that they are trivial, to - 


Tell Ton 
MICROLOGIC 
P.O. Box 586 
Manurewa. 


I have not encountered such problems on local BBCs equipped with 8¢ 
track discs and Acorn DFS. I Know however that a common problem 
eccurs when the dist drive heads get cut of alignment (the same 
nappets on cassette recorders), The drive can read disks it has 
written to and often other people’s disks, but no-one else can read 
its discs. Hopefully Tony will be able to shed further light on this 
one! 
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Lyndon McEntee of Colac Bay School, Riverton, Southland has forwarded 
the following request: 
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" I have nearly completed an index to ali BBC articles, reviews and 
news items fie. everything except the ads } in Micro User, Acorn User, 
Beebug and Electronics & Computing Monthly. However; I have been 
unable to obtain any 1992, July 4983, or August 1983 issues of Acorn 
User. Anyone who can lend me any of these for one week will receive a 
free disk copy of my completed file." 
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FG FS 
FG Fi Software PO Box 66462 Auckland FS 
FG Ft 
Fis Don’t pay €40,00 for software! FG 
Fo F& 
FS We have in stock the new Electron FG 
FG compatible version of the famous FG 
F& DOCTOR SOFT 7Y47 Flight simulator F& 
FG (consistently number 1 game in UF) FG 
FG. ONLY $24.95 '' 3! (E295 on disk) FG 
FG FS 
FG Look out for our products in Gilbert PLS 
F Electronics and The Computer FE 
FS Terminal {opening soon in Birkenhead; FG 
FG FG 
FS We are also agents tor Barson Computers FG 
FS (a.e2. Acorn,Micra Fower eto) FG 
FG FG 
FG FS 
FG SEND SAE FOR OUR FREE CATALOGUE FG 
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PUBLISHER: GAME 
Acorn Aviator 
Countdown 
Hopper 
Meteors 
Monsters 
| Starship Command 
A&F Cylon Attack 
Badger Lunar Lander 
level 3 Colossal Cave 
Dungeon Ady. 
Pace Fortress 
Prag.Pow Danger UXB¢Lyv!1 1) 
Felix the Factory 
Sup Saft Alien Dropout 
@*BERT 
Roadrunner 


*Hardest level, 


HISCORE 


156 
227 
27,196 
24,090 
93,568 
7,873 
68,340 
245 967% 
687 
330 
20,488 
286,498 
7,008 
24,208 
36,268 
70,686 
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SCORER 


Kendal t 

Tim R. 

Jenny 6B, 

Duncan’s flatmate 
Linsay F, 

Robert N. 

Robert N., 
Duncan’s flatmate 
Steve W 

Anne et al 
Kendall 

Steve WW, 

Dianne S., 

David E. 

Dianne S. 

Lois S. 
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CLASSIFIED AD 


WANTED Any record program to Keep church membership records (name, 
address, phone number and other.church related information). 
Would prefer it to be on disk. Write to Donald McKenzie, 49 
Williams Street, -Xaiapoi North Canterbury, if you have a 


program to suit. 
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USER GROUP MEETINGS 40 


AUCKLAND:-meets 2nd Wednesday of the month, 7.3@pm, Conference Rooms; 
Auckland Secondary Teachers College, 69 Epsom Ave, EPSOM. 
ph Dave 77@-63@ » 518(bus) or Kerry 95-355. 

HAMILTON:-Waikato Tech B-block staffroom 7. Ph. Peter, Hamilton 
392-580 x $97(bus) or Alison, Morrinsville 6695, 

TIMARU:- Meetings tc be arranged in the first week of each month. 
Contact Chris Stone ph. Timaru 68394, 

TAURANGA:-every second Wednesday. ph. Chris & Jane 65-074, 

HAWKES BAY:-Alternative months Hastings & Napier. Contact Kendall 

a ae 435-624, Bob Taradale 446-955, Mitch Hastings 

TAUPO: -Contact Dave 34-215, 

WELLINGTON:~-meets LAST Thursday of the month, 7.3@pm, Royal Society 
Lecture Theatre, Turnbull St, Thorndon. ph. Anton 286-289 or 
Warren 787-@85. | 

CHRISTCHURCH:~fortnightly workshops, Monday 6.30pm at Hagley High 
School. ph. Michael 582-267, 

OTHER CENTRES:- let us Know and we will publish details here. 


THE NEWSLETTER: 

CONTRIBUTIONS:-most welcome. rk should be sent in on tape or 
disc.(Tape - 2 copies,one at 30@ baud please). A 35c stamp 
gets your tape / disc returned toc. Please include written 
explanation of listing; text only material welcome tcc. 

wiasiiaiee as For a particular issue, the last day for material is the 

ast day of the month prior to publication. 
ADVERTISING-- Rates are $20 per half page, deadline as above. 


Copyright ic) THE ACORN/BEC COMPUTER USER GROUP OF NZ INC. 
Published monthly except January and mailed to financial members. 


MEMBERSHIP: 
Membership of the users group is on payment of an annual subscription 
from April to March. For the 1984/5 year it is: $30.80, plus a $5.00 
joining fee for new members, plus $5.00 for Auckland & Wellington 
members as a local branch levy, which entitles attendance at meetings 
aS detailed above. Renewing members get all back issues of the 
current year; New members also get back issues to v.t #1 Jan ‘S4. 


THE ACORN/BBC COMPUTER USER GROUP OF NZ INC 
P.O.Box 9992 
Wellington 


Reproduced by ROBERTS PRINTING Co. Ltd, Wellington, 


